
ParticlesQueueEndTime = Sys:Forever('ParticlesQueueEndTime',{})

function StartDestroyParticlesQueue()
	Timer(function ()

		local now = GameRules:GetGameTime()
		for index,endTime in pairs(ParticlesQueueEndTime) do
			if now >= endTime then
				ParticleManager:DestroyParticle(index,true)
            	ParticleManager:ReleaseParticleIndex(index)
            	ParticlesQueueEndTime[index] = nil
			end
		end

		return 1
	end)
end